home *** CD-ROM | disk | FTP | other *** search
/ Aminet 31 / Aminet 31 (1999)(Schatztruhe)[!][Jun 1999].iso / Aminet / text / misc / pdflib.lha / pdflib / pdflib.i < prev    next >
Text File  |  1999-03-07  |  1KB  |  53 lines
  1. // pdflib.i
  2. //
  3. // Copyright (C) 1998 Rainer.Schaaf@T-Online.de All rights reserved.
  4. // SWIG interface file for pdflib
  5.  
  6. // Use different names for Tcl, Perl, and Python packages.
  7. // This is necessary to be able to use all three shared libraries together.
  8.  
  9. #ifdef SWIGTCL
  10. %module pdflib
  11. #endif
  12.  
  13. #ifdef SWIGPERL
  14. %module pdflib
  15. #endif
  16.  
  17. #ifdef SWIGPYTHON
  18. %module pdflib
  19. #endif
  20.  
  21. // to get Tcl_Interp *interp handled right
  22. %import typemaps.i
  23.  
  24. #ifdef TCL
  25. // to make a tcl-package out of the stuff
  26. // it needs pkg_mkIndex afterwards + setup pdflib.so + pkgIndex.tcl to right
  27. // places
  28. // => 
  29. // $ mkdir pdflib
  30. // $ cp pdftcllib.so pdflib/pdflib.so
  31. // $ cd pdflib
  32. // $ tclsh
  33. //   >> pkg_mkIndex . pdflib.so
  34. //   >> ^D
  35. // $
  36.  
  37. %init %{
  38.     Tcl_PkgProvide(interp, "pdflib", "0.6");
  39. %}
  40. #endif
  41.  
  42. // This is needed for the wrapper...
  43. %{
  44. #include "pdf.h"
  45. %}
  46.  
  47. // ...and this fetches the actual interface definitions
  48. %include "pdf.h"
  49.  
  50. // simple file handling needed by PDF_open
  51. FILE *fopen(char *, char *);
  52. void fclose(FILE *fp);
  53.